10 REM *** FREE RAM CHECK *** BUCK CHILDRESS (01/27/86) ***
20 REM *** P.O. BOX 13575 SALEM, OR 97309 ***
30 POKE56,PEEK(56)-4:CLR
40 PRINTCHR$(147)"LOADING AND CHECKING DATA...":PRINT:J=40000:L=100:C=11
50 FORB=0TOC:READA:POKEJ+B,A:X=X+A:NEXTB:READA
60 IFX<>ATHENPRINT"ERROR IN DATA LINE"L:END
70 X=0:J=J+12:L=L+10:IFL<260THEN50
80 IFL=260THENC=7:GOTO50
90 PRINT"DATA OK AND LOADED...":PRINT:PRINT"SYS 40000 TO ACTIVATE...":END
100 DATA32,68,229,169,167,162,2,133,251,134,252,134,1733
110 DATA253,162,0,142,219,216,232,32,186,156,230,253,2081
120 DATA162,0,160,0,138,141,219,4,145,251,209,251,1680
130 DATA208,66,232,208,243,230,251,208,239,230,252,165,2532
140 DATA252,197,253,144,231,201,208,176,37,32,158,156,2045
150 DATA165,253,201,4,176,12,169,60,133,251,162,2,1588
160 DATA32,186,156,76,86,156,169,192,162,207,133,252,1807
170 DATA134,253,162,3,32,186,156,76,86,156,160,13,1417
180 DATA32,194,156,160,30,76,194,156,160,20,32,194,1404
190 DATA156,165,253,201,208,176,240,169,0,133,251,76,2028
200 DATA124,156,160,6,24,32,240,255,160,0,185,230,1572
210 DATA156,240,7,32,210,255,200,76,194,156,192,13,1731
220 DATA144,1,96,166,251,165,252,32,205,189,169,45,1715
230 DATA32,210,255,162,255,165,253,76,205,189,67,72,1941
240 DATA69,67,75,73,78,71,32,42,42,32,0,32,613
250 DATA42,42,32,79,75,0,32,42,42,32,69,82,569
260 DATA82,79,82,0,17,17,17,0,294